<?php
/**
  * Box type par defaut: utilisez ces fichiers pour creer vos propres types de box.
  * Interface d'administration pour regler les parametres du box.
  * Developpe par Rodrigue LE GALL
  *
  * Les variables $env, $box et $param sont disponibles et representent l'environnement, le box et les parametres du box.
  * La variable $modif est reservee.
  */
    if($param->get('nbitem')==''){$param->set('nbitem',0);}
    $listeTexte = $param->get("texte");
    $listeLien  = $param->get("lien");
    $listeTarget= $param->get("target");
    $nbItem     = $param->get("nbitem");
    if($action=='process'){
        $param->set('titre',$titre);
        /**
          * Le code de votre  box se trouve apres
          */
        if($texte!=""){
            /**
              * On ajoute un item.
              */    
            if($iditem==-1){
                $listeTexte[$nbItem]=$texte;
                $listeLien[$nbItem]=$lien;
                $listeTarget[$nbItem]=$target;
                $nbItem++;
            }else{
                $listeTexte[$iditem]=$texte;
                $listeLien[$iditem]=$lien;
                $listeTarget[$iditem]=$target;
            }
            $param->set("texte",$listeTexte);
            $param->set("lien",$listeLien);
            $param->set("target",$listeTarget);
            $param->set("nbitem",$nbItem);
        }
        if($subaction!=''){$next=1;}
        if(($subaction=='supp')&&($nbItem>0)){
            $nbItem--;
            for($i=$listeid;$i<$nbItem;$i++){
                $listeTexte[$i]=$listeTexte[$i+1];
                $listeLien[$i]=$listeLien[$i+1];
                $listeTarget[$i]=$listeTarget[$i+1];
            }
            $param->set("texte",$listeTexte);
            $param->set("lien",$listeLien);
            $param->set("target",$listeTarget);
            $param->set("nbitem",$nbItem);
        }
        if($subaction=='up'&&($listeid>0)){
            $temp=$listeTexte[$listeid-1];
            $listeTexte[$listeid-1]=$listeTexte[$listeid];
            $listeTexte[$listeid]=$temp;
            $temp=$listeLien[$listeid-1];
            $listeLien[$listeid-1]=$listeLien[$listeid];
            $listeLien[$listeid]=$temp;
            $temp=$listeTarget[$listeid-1];
            $listeTarget[$listeid-1]=$listeTarget[$listeid];
            $listeTarget[$listeid]=$temp;
            $param->set("texte",$listeTexte);
            $param->set("lien",$listeLien);
            $param->set("target",$listeTarget);
        }
        /**
          * Fin de votre Code
          */
        $box->setparam($param);
        $env->setbox($argid,$box);
        $modif = "Administration du box ".$box->getnom().".\n" . $modif;
        $query="UPDATE environnement SET environnement='".$env->serialize()."',lastmod=NOW(),modification='".addslashes($modif)."' WHERE id='$envid'";
        @rportalrequete($query) or die ("ERREUR: $query<br />");	
        if($next==0){
            header("Location: ?op=admenvmod&argid=$envid");
            exit;
        }
    }
    
    require_once('module/TPLN/TPLN.php');
    $TPLN = new TPLN;
	$L_base_env = get_env_path();
    $TPLN->Open(get_path_box($box->gettypenom()).'admin.html');
    $TPLN->IncludeFile("header",$L_base_env.$session['environnement']."/header.php");
    $TPLN->IncludeFile("footer",$L_base_env.$session['environnement']."/footer.php");
    $TPLN->Parse("box_nom",$box->getnom());
    $TPLN->Parse("type_nom",$box->gettypenom());
    $TPLN->Parse("type_description",nl2br($box->gettypedescription()));
    $TPLN->Parse("type_dir",$box->getrepertoire());
    $TPLN->Parse("boxid",$box->getid());
    $TPLN->Parse("envid",$envid);
    /**
      * Le code de votre  box se trouve apres
      */
    $TPLN->Parse("titre",$param->get('titre'));
    if($nbItem==0){
        $TPLN->EraseBloc('liste');
    }else{
        for($i=0;$i<$nbItem;$i++){
            $TPLN->Parse("liste.texte",$listeTexte[$i]);
            $TPLN->Parse("liste.lien",$listeLien[$i]);
            $TPLN->Parse("liste.target",$listeTarget[$i]);
            $TPLN->Parse("liste.liste_id",$i);
            $TPLN->Loop("liste");   
        }
    }
    if($action == "mod"){
        $TPLN->Parse("iditem",$listeid);        
        $TPLN->Parse("lien",$listeLien[$listeid]);
        $TPLN->Parse("target",$listeTarget[$listeid]);
        $TPLN->Parse("texte",$listeTexte[$listeid]);
    } else {
        $TPLN->Parse("iditem",'-1');
        $TPLN->Parse("lien",'');
        $TPLN->Parse("target",'');
        $TPLN->Parse("texte",'');
    }
    /**
      * Fin de votre Code
      */
    $TPLN->Write();
    exit;
?>
